home *** CD-ROM | disk | FTP | other *** search
/ Mac Power 1997 November / MACPOWER-1997-11.ISO.7z / MACPOWER-1997-11.ISO / AMUG / MUSIC / bol-processor-271-data.sit / bol-processor-271-data / BP2 examples / BP2 data / -gr.tryGOTO < prev    next >
Text File  |  1995-05-07  |  557b  |  31 lines
  1. V.2.5
  2. Date: Sat, May 6, 1995 -- 23:25
  3. -ho.abc
  4. -se.tryGOTO
  5. [This grammar generates a string containingﾉ]
  6. [ﾉ not more than six ﾔcﾕ and an equalﾉ]
  7. [ﾉ number of ﾔaﾕ and ﾔbﾕ.]
  8.  
  9. ORD
  10. GRAM#1[1] S --> X S  _repeat(K1=12) _goto(1,2)
  11. GRAM#1[2] S --> lambda  _goto(2,0)
  12. ----------
  13. RND
  14. _print
  15. GRAM#2[1] <5-1> X --> C
  16. GRAM#2[2] <1> X --> C _goto(3,1)
  17. ----------
  18. RND
  19. GRAM#3[1] X --> A _failed(4,0) _goto(3,2)
  20. GRAM#3[2] X --> B _failed(3,3) _goto(3,1)
  21. GRAM#3[3] _print ? --> ? B _goto(4,0) _print
  22. ----------
  23. SUB
  24. GRAM#4[1] A --> a 
  25. GRAM#4[2] B --> b
  26. GRAM#4[3] C --> c 
  27.  
  28.  
  29.  
  30.  
  31.